Imports Microsoft.VisualBasic
Imports System.Windows.Forms

Namespace gvImap
    Partial Public Class AboutForm
        Inherits Form
        Public Sub New()
            InitializeComponent()
        End Sub

        Private Sub lnkProducts_LinkClicked(ByVal sender As Object, ByVal e As LinkLabelLinkClickedEventArgs) Handles lnkProducts.LinkClicked
            ' Open on the browser.
            System.Diagnostics.Process.Start((CType(sender, LinkLabel)).Text)
        End Sub

        Private Sub lnkSales_LinkClicked(ByVal sender As Object, ByVal e As LinkLabelLinkClickedEventArgs) Handles lnkSales.LinkClicked
            ' Open mail composer program.
            System.Diagnostics.Process.Start("mailto:" & (CType(sender, LinkLabel)).Text)
        End Sub

        Private Sub lnkForums_LinkClicked(ByVal sender As Object, ByVal e As LinkLabelLinkClickedEventArgs) Handles lnkForums.LinkClicked
            ' Open on the browser.
            System.Diagnostics.Process.Start((CType(sender, LinkLabel)).Text)
        End Sub
    End Class
End Namespace